inherited frm_Device: Tfrm_Device
  Left = 335
  Top = 239
  Caption = #37197#22871#35774#22791#31649#29702
  OldCreateOrder = True
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  inherited ControlBar: TControlBar
    inherited ToolBar2: TToolBar
      inherited btnDelete: TSpeedButton
        OnClick = btnDeleteClick
      end
    end
  end
  inherited GroupBox2: TGroupBox
    Top = 217
    Height = 149
    inherited DBGrid1: TDBGrid
      Height = 132
      DataSource = dsDevice
      OnCellClick = DBGrid1CellClick
      OnMouseDown = DBGrid1MouseDown
      Columns = <
        item
          Expanded = False
          FieldName = 'DeviceID'
          Title.Caption = #35774#22791#32534#21495
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'DeviceName'
          Title.Caption = #22411#21495#21517#31216
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'DeviceType'
          Title.Caption = #31867#22411#21517#31216
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Producer'
          Title.Caption = #29983#20135#21378#23478
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'OilCost'
          Title.Caption = #32791#27833#37327
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Remark'
          Title.Caption = #22791#27880
          Visible = False
        end>
    end
  end
  inherited GroupBox1: TGroupBox
    Height = 160
    inherited DBText1: TDBText
      Left = 97
      Top = 18
      DataField = 'DeviceID'
      DataSource = dsDevice
    end
    object Label1: TLabel [1]
      Left = 181
      Top = 20
      Width = 60
      Height = 13
      Caption = #22411#21495#21517#31216#65306
    end
    object Label2: TLabel [2]
      Left = 29
      Top = 20
      Width = 60
      Height = 13
      Caption = #35774#22791#32534#21495#65306
    end
    object Label3: TLabel [3]
      Left = 29
      Top = 52
      Width = 60
      Height = 13
      Caption = #31867#21035#21517#31216#65306
    end
    object Label4: TLabel [4]
      Left = 29
      Top = 116
      Width = 63
      Height = 13
      Caption = #22791'         '#27880#65306
    end
    object Label5: TLabel [5]
      Left = 253
      Top = 52
      Width = 48
      Height = 13
      Caption = #32791#27833#37327#65306
      Visible = False
    end
    object Label6: TLabel [6]
      Left = 29
      Top = 84
      Width = 60
      Height = 13
      Caption = #29983#20135#21378#23478#65306
    end
    object Label7: TLabel [7]
      Left = 280
      Top = 80
      Width = 97
      Height = 13
      AutoSize = False
      Caption = #21333#20301#65306#21319'/'#23567#26102
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      Visible = False
    end
    inherited DBEdit1: TDBEdit
      Top = 18
      DataField = 'DeviceName'
      DataSource = dsDevice
    end
    object DBLookupComboBox1: TDBLookupComboBox
      Left = 97
      Top = 48
      Width = 145
      Height = 21
      DataField = 'DeviceType'
      DataSource = dsDevice
      KeyField = 'TypeName'
      ListField = 'TypeName'
      ListSource = dsDeviceType
      TabOrder = 1
      OnCloseUp = DBLookupComboBox1CloseUp
      OnMouseUp = DBLookupComboBox1MouseUp
    end
    object DBMemo1: TDBMemo
      Left = 97
      Top = 112
      Width = 144
      Height = 41
      DataField = 'Remark'
      DataSource = dsDevice
      TabOrder = 2
      OnKeyPress = DBEdit1KeyPress
    end
    object DBEdit2: TDBEdit
      Left = 304
      Top = 48
      Width = 65
      Height = 21
      DataField = 'OilCost'
      DataSource = dsDevice
      TabOrder = 3
      Visible = False
    end
    object DBEdit3: TDBEdit
      Left = 97
      Top = 80
      Width = 144
      Height = 21
      DataField = 'Producer'
      DataSource = dsDevice
      TabOrder = 4
      OnKeyPress = DBEdit1KeyPress
    end
  end
  object dsDevice: TDataSource
    DataSet = DM.dsDevice
    Left = 312
    Top = 177
  end
  object dsDeviceType: TDataSource
    DataSet = DM.dsDeviceType
    Left = 352
    Top = 177
  end
end
